home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / pc / 3-Presentations / Apple Demos / Training / HyperCard 2.0 Training / •HC 2.0-2 / card_40153.txt < prev    next >
Text File  |  1990-08-07  |  7KB  |  354 lines
  1. -- card: 40153 from stack: in.0-2
  2. -- bmap block id: 40206
  3. -- flags: 0000
  4. -- background id: 15301
  5. -- name: mainframe.1
  6. ----- HyperTalk script -----
  7. on closeCard
  8.   hideFields
  9.   resetScrolls
  10. end closeCard
  11.  
  12. on showField n
  13.   set cursor to none
  14.   clearPicture
  15.   hideFields
  16.   runMainframe
  17.   zoomRect the rect of btn "screenButton", the rect of cd fld ("Info" & n)
  18.   show cd fld ("Info" & n)
  19. end showField
  20.  
  21. on hideFields
  22.   repeat with n = 1 to 4
  23.     hide cd fld ("Info" & n)
  24.   end repeat
  25. end hideFields
  26.  
  27. on resetScrolls
  28.   repeat with n = 1 to 3
  29.     set the scroll of cd fld ("Info" & n) to 0
  30.   end repeat
  31. end resetScrolls
  32.  
  33. on runMainframe
  34.   repeat for 3
  35.     repeat with n = 1 to 5
  36.       show btn ("mb" & n)
  37.       wait 5
  38.       hide btn ("mb" & n)
  39.     end repeat
  40.   end repeat
  41. end runMainframe
  42.  
  43. on showPicture str
  44.   set cursor to none
  45.   clearPicture
  46.   hideFields
  47.   runMainframe
  48.   if str = "BaltimoreOriole" then
  49.     put "STATE BIRD" into cd fld "Info4"
  50.   else
  51.     put "STATE SPORT" into cd fld "Info4"
  52.   end if
  53.   show cd fld "Info4"
  54.   wait 30
  55.   hide cd fld "Info4"
  56.   PaintPict str,cd,"screenButton"
  57. end showPicture
  58.  
  59. on clearPicture
  60.   lock screen
  61.   choose button tool
  62.   choose browse tool
  63.   unlock screen
  64. end clearPicture
  65.  
  66.  
  67. -- part 22 (field)
  68. -- low flags: 81
  69. -- high flags: 2007
  70. -- rect: left=63 top=213 right=289 bottom=238
  71. -- title width / last selected line: 0
  72. -- icon id / first selected line: 0 / 0
  73. -- text alignment: 0
  74. -- font id: 174
  75. -- text size: 12
  76. -- style flags: 0
  77. -- line height: 15
  78. -- part name: info3
  79. ----- HyperTalk script -----
  80. on mouseUp
  81.   if 54 = 678 then
  82.   end if
  83. end mouseUp
  84.  
  85.  
  86. -- part 23 (field)
  87. -- low flags: 81
  88. -- high flags: 2007
  89. -- rect: left=63 top=213 right=289 bottom=238
  90. -- title width / last selected line: 0
  91. -- icon id / first selected line: 0 / 0
  92. -- text alignment: 0
  93. -- font id: 174
  94. -- text size: 12
  95. -- style flags: 0
  96. -- line height: 15
  97. -- part name: info2
  98.  
  99.  
  100. -- part 2 (button)
  101. -- low flags: 80
  102. -- high flags: 0000
  103. -- rect: left=356 top=163 right=195 bottom=388
  104. -- title width / last selected line: 0
  105. -- icon id / first selected line: 19465 / 19465
  106. -- text alignment: 1
  107. -- font id: 0
  108. -- text size: 12
  109. -- style flags: 0
  110. -- line height: 16
  111. -- part name: mb2
  112. ----- HyperTalk script -----
  113.  
  114.  
  115.  
  116.  
  117. -- part 3 (button)
  118. -- low flags: 80
  119. -- high flags: 0000
  120. -- rect: left=344 top=164 right=194 bottom=376
  121. -- title width / last selected line: 0
  122. -- icon id / first selected line: 19465 / 19465
  123. -- text alignment: 1
  124. -- font id: 0
  125. -- text size: 12
  126. -- style flags: 0
  127. -- line height: 16
  128. -- part name: mb3
  129. ----- HyperTalk script -----
  130.  
  131.  
  132.  
  133.  
  134. -- part 4 (button)
  135. -- low flags: 80
  136. -- high flags: 0000
  137. -- rect: left=332 top=163 right=195 bottom=364
  138. -- title width / last selected line: 0
  139. -- icon id / first selected line: 19465 / 19465
  140. -- text alignment: 1
  141. -- font id: 0
  142. -- text size: 12
  143. -- style flags: 0
  144. -- line height: 16
  145. -- part name: mb4
  146. ----- HyperTalk script -----
  147.  
  148.  
  149.  
  150.  
  151. -- part 5 (button)
  152. -- low flags: 80
  153. -- high flags: 0000
  154. -- rect: left=356 top=181 right=213 bottom=388
  155. -- title width / last selected line: 0
  156. -- icon id / first selected line: 1391 / 1391
  157. -- text alignment: 1
  158. -- font id: 0
  159. -- text size: 12
  160. -- style flags: 0
  161. -- line height: 16
  162. -- part name: mb5
  163.  
  164.  
  165. -- part 6 (button)
  166. -- low flags: 80
  167. -- high flags: 4000
  168. -- rect: left=318 top=154 right=170 bottom=379
  169. -- title width / last selected line: 0
  170. -- icon id / first selected line: 0 / 0
  171. -- text alignment: 1
  172. -- font id: 0
  173. -- text size: 12
  174. -- style flags: 0
  175. -- line height: 16
  176. -- part name: mb1
  177.  
  178.  
  179. -- part 11 (button)
  180. -- low flags: 00
  181. -- high flags: 2000
  182. -- rect: left=307 top=191 right=203 bottom=319
  183. -- title width / last selected line: 0
  184. -- icon id / first selected line: 20550 / 20550
  185. -- text alignment: 1
  186. -- font id: 0
  187. -- text size: 12
  188. -- style flags: 0
  189. -- line height: 16
  190. -- part name: b1
  191. ----- HyperTalk script -----
  192. on mouseUp
  193.   showPicture BaltimoreOriole
  194. end mouseUp
  195.  
  196.  
  197.  
  198. -- part 18 (button)
  199. -- low flags: 00
  200. -- high flags: 2000
  201. -- rect: left=307 top=199 right=211 bottom=319
  202. -- title width / last selected line: 0
  203. -- icon id / first selected line: 20550 / 20550
  204. -- text alignment: 1
  205. -- font id: 0
  206. -- text size: 12
  207. -- style flags: 0
  208. -- line height: 16
  209. -- part name: b1
  210. ----- HyperTalk script -----
  211. on mouseUp
  212.   showField 2
  213. end mouseUp
  214.  
  215.  
  216.  
  217. -- part 17 (button)
  218. -- low flags: 00
  219. -- high flags: 2000
  220. -- rect: left=307 top=207 right=219 bottom=319
  221. -- title width / last selected line: 0
  222. -- icon id / first selected line: 20550 / 20550
  223. -- text alignment: 1
  224. -- font id: 0
  225. -- text size: 12
  226. -- style flags: 0
  227. -- line height: 16
  228. -- part name: b1
  229. ----- HyperTalk script -----
  230. on mouseUp
  231.   showField 1
  232. end mouseUp
  233.  
  234.  
  235.  
  236. -- part 19 (button)
  237. -- low flags: 00
  238. -- high flags: 2000
  239. -- rect: left=307 top=215 right=227 bottom=319
  240. -- title width / last selected line: 0
  241. -- icon id / first selected line: 20550 / 20550
  242. -- text alignment: 1
  243. -- font id: 0
  244. -- text size: 12
  245. -- style flags: 0
  246. -- line height: 16
  247. -- part name: b1
  248. ----- HyperTalk script -----
  249. on mouseUp
  250.   showPicture Jousting
  251. end mouseUp
  252.  
  253.  
  254.  
  255. -- part 21 (button)
  256. -- low flags: 00
  257. -- high flags: 2000
  258. -- rect: left=307 top=223 right=235 bottom=319
  259. -- title width / last selected line: 0
  260. -- icon id / first selected line: 20550 / 20550
  261. -- text alignment: 1
  262. -- font id: 0
  263. -- text size: 12
  264. -- style flags: 0
  265. -- line height: 16
  266. -- part name: b1
  267. ----- HyperTalk script -----
  268. on mouseUp
  269.   showField 3
  270. end mouseUp
  271.  
  272.  
  273.  
  274. -- part 20 (field)
  275. -- low flags: 81
  276. -- high flags: 2007
  277. -- rect: left=63 top=213 right=289 bottom=238
  278. -- title width / last selected line: 0
  279. -- icon id / first selected line: 0 / 0
  280. -- text alignment: 0
  281. -- font id: 174
  282. -- text size: 12
  283. -- style flags: 0
  284. -- line height: 15
  285. -- part name: info1
  286.  
  287.  
  288. -- part 25 (button)
  289. -- low flags: 00
  290. -- high flags: 0000
  291. -- rect: left=258 top=191 right=231 bottom=306
  292. -- title width / last selected line: 0
  293. -- icon id / first selected line: 0 / 0
  294. -- text alignment: 1
  295. -- font id: 0
  296. -- text size: 12
  297. -- style flags: 0
  298. -- line height: 16
  299. -- part name: screenButton
  300. ----- HyperTalk script -----
  301. on mouseUp
  302.   if 5 = 32 then
  303.   end if
  304. end mouseUp
  305.  
  306.  
  307.  
  308. -- part 26 (field)
  309. -- low flags: 81
  310. -- high flags: 2002
  311. -- rect: left=258 top=191 right=231 bottom=306
  312. -- title width / last selected line: 0
  313. -- icon id / first selected line: 0 / 0
  314. -- text alignment: 1
  315. -- font id: 174
  316. -- text size: 10
  317. -- style flags: 0
  318. -- line height: 13
  319. -- part name: Info4
  320.  
  321.  
  322. -- part contents for background part 1
  323. ----- text -----
  324. HyperCard can be an engaging graphical front end to a mainframe database, allowing you to access the database information‚Äîand you might never know that a mainframe was lurking in the background.
  325.  
  326. Click the buttons on 
  327. the Macintosh computer 
  328. screen for a simulation.
  329.  
  330.  
  331.  
  332.  
  333.  
  334.  
  335.  
  336.  
  337.  
  338.  
  339. -- part contents for card part 20
  340. ----- text -----
  341. As of 1979, Maryland had a population of 4,176,100 in 9,891 square miles.
  342. The highest point in Maryland is Backbone Mountain, in the extreme southwest point of the state; the mountain has an elevation of 3360 feet.
  343.  
  344. -- part contents for card part 22
  345. ----- text -----
  346. The longest running conflict in the United States has been between rival Maryland and Virginian oystermen, over oysterbeds in the Chesapeake Bay.
  347.  
  348. -- part contents for card part 23
  349. ----- text -----
  350. The capital of Maryland is Annapolis, the first capital of the United States. Annapolis has a charming downtown area, full of old, brick, Georgian homes and narrow cobblestone streets‚Äîand around any bend could be a small creek, full of blue crab and dinghies. The Naval Academy is also in Annapolis.
  351.  
  352. -- part contents for card part 26
  353. ----- text -----
  354. STATE SPORT